// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 

0000:
WHILE TRUE
    wait 0
    0ab4: 29@ < 569 //send_handler
    IF 056D:   actor 29@ defined                                                                                                                                                            
    JF BREAK       
    VAR                                                                                                                                                                                          
    16@:FLOAT                                                                                                                                                                                          
    15@:FLOAT                                                                                                                                                                                       
    END
    Actor.StorePos(29@, 17@, 18@, 19@)           
    02CE: 20@ = ground_z_at 17@ 18@ 19@                                                                                                                                                               
    20@ += 30.1                                                                                                                                                                                                       
    0819: 15@ = actor 29@ distance_from_ground
    15@ += 20.1   
    16@ = 15@ 
    for 0@ = 1 to 30 step 1
        0ab4: 29@ < 569 //send_handler
        IF 056D:   actor 29@ defined
                                                                                                                                                              
        JF BREAK    
        04C4: store_coords_to 12@ 13@ 14@ from_actor 29@ with_offset 0.0 0.0 16@       
        024F: create_corona_with_radius 2.0 type 2 lensflares 0 with_color 0 255 255 at 12@ 13@ 14@
        16@ -= 2.0 
    end
    0ab4: 1@ < 568 
    if 1@ == false
    then end_thread
    end 
END